package com.joolun.system.service.impl;

import java.util.ArrayList;
import java.util.List;
import java.util.regex.Pattern;

import com.joolun.common.constant.Constants;
import com.joolun.common.core.redis.RedisCache;
import com.joolun.system.domain.vo.AppRegReq;
import org.apache.commons.lang3.RandomStringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import com.joolun.common.annotation.DataScope;
import com.joolun.common.constant.UserConstants;
import com.joolun.common.core.domain.entity.SysRole;
import com.joolun.common.core.domain.entity.SysUser;
import com.joolun.common.exception.CustomException;
import com.joolun.common.utils.SecurityUtils;
import com.joolun.common.utils.StringUtils;
import com.joolun.system.domain.SysPost;
import com.joolun.system.domain.SysUserPost;
import com.joolun.system.domain.SysUserRole;
import com.joolun.system.mapper.SysPostMapper;
import com.joolun.system.mapper.SysRoleMapper;
import com.joolun.system.mapper.SysUserMapper;
import com.joolun.system.mapper.SysUserPostMapper;
import com.joolun.system.mapper.SysUserRoleMapper;
import com.joolun.system.service.ISysConfigService;
import com.joolun.system.service.ISysUserService;

/**
 * 用户 业务层处理
 *
 * @author ruoyi
 */
@Service
public class SysUserServiceImpl implements ISysUserService {
    private static final Logger log = LoggerFactory.getLogger(SysUserServiceImpl.class);

    @Autowired
    private SysUserMapper userMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysPostMapper postMapper;

    @Autowired
    private SysUserRoleMapper userRoleMapper;

    @Autowired
    private SysUserPostMapper userPostMapper;

    @Autowired
    private ISysConfigService configService;

    /**
     * 根据条件分页查询用户列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectUserList(SysUser user) {
        return userMapper.selectUserList(user);
    }

    /**
     * 通过用户名查询用户
     *
     * @param userName 用户名
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByUserName(String userName) {
        return userMapper.selectUserByUserName(userName);
    }

    /**
     * 通过用户ID查询用户
     *
     * @param userId 用户ID
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserById(Long userId) {
        return userMapper.selectUserById(userId);
    }

    /**
     * 查询用户所属角色组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserRoleGroup(String userName) {
        List<SysRole> list = roleMapper.selectRolesByUserName(userName);
        StringBuffer idsStr = new StringBuffer();
        for (SysRole role : list) {
            idsStr.append(role.getRoleName()).append(",");
        }
        if (StringUtils.isNotEmpty(idsStr.toString())) {
            return idsStr.substring(0, idsStr.length() - 1);
        }
        return idsStr.toString();
    }

    /**
     * 查询用户所属岗位组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserPostGroup(String userName) {
        List<SysPost> list = postMapper.selectPostsByUserName(userName);
        StringBuffer idsStr = new StringBuffer();
        for (SysPost post : list) {
            idsStr.append(post.getPostName()).append(",");
        }
        if (StringUtils.isNotEmpty(idsStr.toString())) {
            return idsStr.substring(0, idsStr.length() - 1);
        }
        return idsStr.toString();
    }

    /**
     * 校验用户名称是否唯一
     *
     * @param userName 用户名称
     * @return 结果
     */
    @Override
    public String checkUserNameUnique(String userName) {
        int count = userMapper.checkUserNameUnique(userName);
        if (count > 0) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验用户名称是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public String checkPhoneUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkPhoneUnique(user.getPhonenumber());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验email是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public String checkEmailUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkEmailUnique(user.getEmail());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验用户是否允许操作
     *
     * @param user 用户信息
     */
    @Override
    public void checkUserAllowed(SysUser user) {
        if (StringUtils.isNotNull(user.getUserId()) && user.isAdmin()) {
            throw new CustomException("不允许操作超级管理员用户");
        }
    }

    /**
     * 新增保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int insertUser(SysUser user) {
        // 新增用户信息
        int rows = userMapper.insertUser(user);
        // 新增用户岗位关联
        insertUserPost(user);
        // 新增用户与角色管理
        insertUserRole(user);
        return rows;
    }

    /**
     * 修改保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int updateUser(SysUser user) {
        Long userId = user.getUserId();
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 新增用户与角色管理
        insertUserRole(user);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPostByUserId(userId);
        // 新增用户与岗位管理
        insertUserPost(user);
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户状态
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserStatus(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户基本信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserProfile(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户头像
     *
     * @param userName 用户名
     * @param avatar   头像地址
     * @return 结果
     */
    @Override
    public boolean updateUserAvatar(String userName, String avatar) {
        return userMapper.updateUserAvatar(userName, avatar) > 0;
    }

    /**
     * 重置用户密码
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int resetPwd(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 重置用户密码
     *
     * @param userName 用户名
     * @param password 密码
     * @return 结果
     */
    @Override
    public int resetUserPwd(String userName, String password) {
        return userMapper.resetUserPwd(userName, password);
    }

    /**
     * 新增用户角色信息
     *
     * @param user 用户对象
     */
    public void insertUserRole(SysUser user) {
        Long[] roles = user.getRoleIds();
        if (StringUtils.isNotNull(roles)) {
            // 新增用户与角色管理
            List<SysUserRole> list = new ArrayList<SysUserRole>();
            for (Long roleId : roles) {
                SysUserRole ur = new SysUserRole();
                ur.setUserId(user.getUserId());
                ur.setRoleId(roleId);
                list.add(ur);
            }
            if (list.size() > 0) {
                userRoleMapper.batchUserRole(list);
            }
        }
    }

    /**
     * 新增用户岗位信息
     *
     * @param user 用户对象
     */
    public void insertUserPost(SysUser user) {
        Long[] posts = user.getPostIds();
        if (StringUtils.isNotNull(posts)) {
            // 新增用户与岗位管理
            List<SysUserPost> list = new ArrayList<SysUserPost>();
            for (Long postId : posts) {
                SysUserPost up = new SysUserPost();
                up.setUserId(user.getUserId());
                up.setPostId(postId);
                list.add(up);
            }
            if (list.size() > 0) {
                userPostMapper.batchUserPost(list);
            }
        }
    }

    /**
     * 通过用户ID删除用户
     *
     * @param userId 用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserById(Long userId) {
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 删除用户与岗位表
        userPostMapper.deleteUserPostByUserId(userId);
        return userMapper.deleteUserById(userId);
    }

    /**
     * 批量删除用户信息
     *
     * @param userIds 需要删除的用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserByIds(Long[] userIds) {
        for (Long userId : userIds) {
            checkUserAllowed(new SysUser(userId));
        }
        // 删除用户与角色关联
        userRoleMapper.deleteUserRole(userIds);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPost(userIds);
        return userMapper.deleteUserByIds(userIds);
    }

    /**
     * 导入用户数据
     *
     * @param userList        用户数据列表
     * @param isUpdateSupport 是否更新支持，如果已存在，则进行更新数据
     * @param operName        操作用户
     * @return 结果
     */
    @Override
    public String importUser(List<SysUser> userList, Boolean isUpdateSupport, String operName) {
        if (StringUtils.isNull(userList) || userList.size() == 0) {
            throw new CustomException("导入用户数据不能为空！");
        }
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        String password = configService.selectConfigByKey("sys.user.initPassword");
        for (SysUser user : userList) {
            try {
                // 验证是否存在这个用户
                SysUser u = userMapper.selectUserByUserName(user.getUserName());
                if (StringUtils.isNull(u)) {
                    user.setPassword(SecurityUtils.encryptPassword(password));
                    user.setCreateBy(operName);
                    this.insertUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 导入成功");
                } else if (isUpdateSupport) {
                    user.setUpdateBy(operName);
                    this.updateUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 更新成功");
                } else {
                    failureNum++;
                    failureMsg.append("<br/>" + failureNum + "、账号 " + user.getUserName() + " 已存在");
                }
            } catch (Exception e) {
                failureNum++;
                String msg = "<br/>" + failureNum + "、账号 " + user.getUserName() + " 导入失败：";
                failureMsg.append(msg + e.getMessage());
                log.error(msg, e);
            }
        }
        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据格式不正确，错误如下：");
            throw new CustomException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部导入成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

    @Autowired
    private RedisCache redisCache;

    @Override
    @Transactional
    public synchronized int insertAppUser(AppRegReq userReq) {
        SysUser user = new SysUser();
        user.setUserType("01"); // 外部用户，不可登录后台管理
        user.setUserName(userReq.getUserName().toLowerCase());
        user.setNickName(userReq.getNickName());
        user.setPhonenumber(userReq.getPhonenumber());
        user.setPassword(userReq.getPassword());
        user.setVerCode(userReq.getValidCode());

        // 校验验证码
        if (StringUtils.isEmpty(userReq.getValidCode())) {
            throw new CustomException("验证码不可为空");
        } else {
            // 测试代码跳过验证
            if (!"admin123".equalsIgnoreCase(userReq.getValidCode())) {
                if (StringUtils.isEmpty(userReq.getPhonenumber())) {
                    throw new CustomException("手机号不能为空");
                }
                String verCode = redisCache.getCacheObject(Constants.CAPTCHA_CODE_KEY + userReq.getPhonenumber());
                if (!userReq.getValidCode().equalsIgnoreCase(verCode)) {
                    throw new CustomException("验证码错误");
                }
            }
        }

        // 校验用户名
        if (StringUtils.isEmpty(user.getUserName())) {
            throw new CustomException("用户名不可为空");
        } else {
            Pattern pattern = Pattern.compile("^[a-z0-9_]{6,12}");

            if (!pattern.matcher(user.getUserName()).matches()) {
                throw new CustomException("用户名不合法：6到12位小写字母、数字");
            }
            int ext = userMapper.checkUserNameUnique(user.getUserName());// 校验用户重复性
            if (ext > 0) {
                throw new CustomException("用户名重复");
            }
        }

        // 校验密码
        if (StringUtils.isEmpty(user.getPassword())) {
            throw new CustomException("密码不可为空");
        } else {
            String regExp = "^[\\w]{8,12}";
            if (!user.getPassword().matches(regExp)) {
                throw new CustomException("密码不合法：必须是8-12位的字母、数字");
            }
            user.setPassword(SecurityUtils.encryptPassword(user.getPassword()));
        }

        SysUser refPerson = new SysUser();
        // 校验推荐人，并根据推荐人补充个人代码
        if (StringUtils.isEmpty(userReq.getRefCode())) {
            throw new CustomException("推荐人代码不可为空");
        } else {
            List<SysUser> parent = userMapper.selectUserByRefCode(userReq.getRefCode());// 根据推荐码获取推荐人
            if (parent.size() == 0) {
                throw new CustomException("推荐人不存在");
            } else {
                refPerson = parent.get(0);
                user.setUserCode(getChildCode(parent.get(0).getUserCode()));// 推荐人的孩子结点计算；
            }
        }

        // 校验位置，并推算自己位置
        if (StringUtils.isEmpty(userReq.getParent())) {
            // 如果未填安置人   则在邀请人的左边一直往下排线
            String position = refPerson.getuPosition();
            String maxLeftByPosition = userMapper.selectMaxLeftByPosition(position);// 根据推荐码获取推荐人
            user.setuPosition(maxLeftByPosition + "1");
        } else {
            // 填安置人，选择左区右区  确定位置无误;
            if (userReq.getPosition() == 0) {
                throw new CustomException("位置不可为空");
            }
            // 1 左； 2 右
            String parentPosition = userReq.getParent();
            String position = parentPosition + userReq.getPosition();
            // 校验安置人
            List<SysUser> parent = userMapper.selectUserByPositionCode(position);// 根据推荐码获取推荐人
            if (parent.size() > 0) {
                throw new CustomException("位置已占用");
            } else {
                user.setuPosition(position);// 推荐人的孩子结点计算；
            }
        }

        if (StringUtils.isEmpty(user.getNickName())) {
            user.setNickName(user.getUserName());
        }
        user.setUserRefCode(RandomStringUtils.randomAlphanumeric(6));
        // 新增用户信息
        int rows = userMapper.insertUser(user);

        return rows;
    }

    /**
     * 根据推荐人代码获取本人代码
     *
     * @param refUserCode
     * @return
     */
    private String getChildCode(String refUserCode) {
        String result = "";
        if (StringUtils.isEmpty(refUserCode)) {
            throw new CustomException("推荐人信息有误");
        } else {
            refUserCode = refUserCode + ".";

            List<String> children = getTeamByUserCode(refUserCode);
            if (children.size() == 0) {
                result = refUserCode + 1;
            }
            int max = 0;
            for (String userCode : children) {
                if (userCode.split("\\.").length != refUserCode.split("\\.").length + 1) {
                    continue;
                }
                int cIndex = Integer.parseInt(userCode.substring(refUserCode.length()));
                max = max > cIndex ? max : cIndex;
            }
            result = refUserCode + (max + 1);
        }
        return result;
    }

    @Override
    public List<String> getTeamByUserCode(String userCode) {
        return userMapper.selectChildUserCodeList(userCode);
    }

    @Override
    public SysUser getAppUser(SysUser user) {
        return userMapper.getAppUser(user);
    }

    @Override
    public int updateAppUser(SysUser user) {
        return userMapper.updateUser(user);
    }

}
